function GM:GetFallDamage( ply, speed )
	if ( speed > 100 ) then
		self.LegsDamaged = 1
	end
	return ( speed / 12 )
end

function GM:ScalePlayerDamage( ply, hitgroup, dmginfo )
	if (hitgroup == HITGROUP_HEAD) then
		dmginfo:ScaleDamage(5)
	end
	
	if (hitgroup == HITGROUP_LEFTARM || hitgroup == HITGROUP_RIGHTARM) then
		dmginfo:ScaleDamage(2)	
	end
	
	if ( hitgroup == HITGROUP_LEFTLEG || hitgroup == HITGROUP_RIGHTLEG ) then
		dmginfo:ScaleDamage(2)
		ply.LegsDamaged = 1
		GAMEMODE:SetPlayerSpeed( ply, 250 * 0.25, 500 * 0.25)
	end
	
	if (hitgroup == HITGROUP_GEAR) then
		dmginfo:ScaleDamage(2)	
	end
	
end

function GM:SetPlayerSpeed( ply )
	GAMEMODE:SetPlayerSpeed( ply, 200 - (100 * ply.LegsDamaged), 450 - (150 * ply.LegsDamaged) )
end